home *** CD-ROM | disk | FTP | other *** search
- print "Baudraten Test"
- baudrate=19200
- 1:
- print "Teste ";
- print baudrate
- send "atz"
- rwait 3000,"OK"
- if status=0 then 2
- baudrate=baudrate/2
- if baudrate<300 then 3:
- goto 1
- 2:
- print
- print "Ihr Modem kann maximal ";
- print baudrate;
- print " baud"
- end
- 3:
- print "Ist da überhaupt ein Modem dran?"
- baudrate=19200
- end
-